home *** CD-ROM | disk | FTP | other *** search
/ Experimental BBS Explossion 3 / Experimental BBS Explossion III.iso / c / cujoct93.zip / 1110105A < prev    next >
Text File  |  1993-08-10  |  439b  |  24 lines
  1. class rational
  2.     {
  3. public:
  4.     rational(long n = 0, long d = 1)
  5.         : num(n), denom(d) { }
  6.     rational &operator+=(rational r);
  7.     friend rational operator+(rational r1, rational r2);
  8.     // ...
  9. private:
  10.     long num, denom;
  11.     // ...
  12.     };
  13.  
  14. // ...
  15.  
  16. rational operator+(rational r1, rational r2)
  17.     {
  18.     rational r;
  19.     r.num = r1.num * r2.denom + r2.num * r1.denom;
  20.     r.denom = r1.denom * r2.denom;
  21.     return r;
  22.     }
  23.  
  24.